home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / electronic / 555 / !555 / !RunImage < prev    next >
Unknown  |  1995-03-20  |  8.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0a f4 20 3e 35 | 35 35 0d 00 14 20 f4 20 |..... >5|55... . |
|00000010| 35 35 35 20 74 69 6d 65 | 72 20 63 6f 6d 70 6f 6e |555 time|r compon|
|00000020| 65 6e 74 20 76 61 6c 75 | 65 73 0d 00 1e 15 f4 20 |ent valu|es..... |
|00000030| 42 79 20 50 2e 45 2e 4d | 61 72 73 68 61 6c 6c 0d |By P.E.M|arshall.|
|00000040| 00 28 0f f4 20 56 65 72 | 73 69 6f 6e 20 31 0d 00 |.(.. Ver|sion 1..|
|00000050| 32 0f 20 ee 20 85 20 f6 | 3a f1 9e 3a e0 0d 00 3c |2. . . .|:..:...<|
|00000060| 04 0d 00 46 0b 20 71 75 | 69 74 3d a3 0d 00 50 0f |...F. qu|it=...P.|
|00000070| 20 6d 6f 6e 6f 6d 6f 64 | 65 3d a3 0d 00 5a 04 0d | monomod|e=...Z..|
|00000080| 00 64 11 20 40 25 3d 26 | 30 31 30 32 30 32 30 41 |.d. @%=&|0102020A|
|00000090| 0d 00 6e 12 20 de 20 62 | 6c 6f 63 6b 25 20 26 38 |..n. . b|lock% &8|
|000000a0| 30 30 0d 00 78 14 20 de | 20 66 6f 6e 74 61 72 72 |00..x. .| fontarr|
|000000b0| 61 79 20 32 35 36 0d 00 | 82 22 20 e3 20 49 25 3d |ay 256..|." . I%=|
|000000c0| 30 20 b8 20 32 35 35 3a | 66 6f 6e 74 61 72 72 61 |0 . 255:|fontarra|
|000000d0| 79 3f 49 25 3d 30 3a ed | 0d 00 8c 16 20 de 20 6d |y?I%=0:.|.... . m|
|000000e0| 61 69 6e 5f 6d 65 6e 75 | 25 20 26 34 30 30 0d 00 |ain_menu|% &400..|
|000000f0| 96 13 20 de 20 69 63 6f | 6e 61 64 64 72 28 32 30 |.. . ico|naddr(20|
|00000100| 29 0d 00 a0 3c 20 c8 99 | 22 57 69 6d 70 5f 49 6e |)...< ..|"Wimp_In|
|00000110| 69 74 69 61 6c 69 73 65 | 22 20 2c 32 30 30 2c 26 |itialise|" ,200,&|
|00000120| 34 42 35 33 34 31 35 34 | 2c 22 35 35 35 22 20 b8 |4B534154|,"555" .|
|00000130| 20 76 65 72 73 69 6f 6e | 2c 74 61 73 6b 0d 00 aa | version|,task...|
|00000140| 31 20 73 70 72 69 74 65 | 61 72 65 61 3d a4 4c 6f |1 sprite|area=.Lo|
|00000150| 61 64 53 70 72 69 74 65 | 73 28 22 3c 35 35 35 24 |adSprite|s("<555$|
|00000160| 44 69 72 3e 2e 53 70 72 | 69 74 65 73 22 29 0d 00 |Dir>.Spr|ites")..|
|00000170| b4 17 20 69 63 6f 6e 62 | 75 66 6c 65 6e 20 3d 20 |.. iconb|uflen = |
|00000180| 26 32 30 30 30 0d 00 be | 2d 20 de 20 74 65 6d 70 |&2000...|- . temp|
|00000190| 62 75 66 20 69 63 6f 6e | 62 75 66 6c 65 6e 2c 20 |buf icon|buflen, |
|000001a0| 69 63 6f 6e 62 75 66 20 | 69 63 6f 6e 62 75 66 6c |iconbuf |iconbufl|
|000001b0| 65 6e 0d 00 c8 11 20 6e | 65 78 74 3d 69 63 6f 6e |en.... n|ext=icon|
|000001c0| 62 75 66 0d 00 d2 32 20 | c8 99 20 22 57 69 6d 70 |buf...2 |.. "Wimp|
|000001d0| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|000001e0| 22 3c 35 35 35 24 44 69 | 72 3e 2e 54 65 6d 70 6c |"<555$Di|r>.Templ|
|000001f0| 61 74 65 73 22 0d 00 dc | 25 20 6d 61 69 6e 68 61 |ates"...|% mainha|
|00000200| 6e 64 6c 65 20 3d 20 a4 | 77 69 6e 64 6f 77 5f 64 |ndle = .|window_d|
|00000210| 65 66 28 22 6d 61 69 6e | 22 29 0d 00 e6 3d 20 e3 |ef("main|")...= .|
|00000220| 20 49 25 3d 30 20 b8 20 | 38 20 3a 20 69 63 6f 6e | I%=0 . |8 : icon|
|00000230| 61 64 64 72 28 49 25 29 | 20 3d 20 a4 69 63 6f 6e |addr(I%)| = .icon|
|00000240| 61 64 64 72 28 6d 61 69 | 6e 68 61 6e 64 6c 65 2c |addr(mai|nhandle,|
|00000250| 49 25 29 20 3a 20 ed 0d | 00 f0 23 20 c8 99 22 57 |I%) : ..|..# .."W|
|00000260| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 49 6e 66 |imp_GetW|indowInf|
|00000270| 6f 22 2c 2c 62 6c 6f 63 | 6b 25 0d 00 fa 2d 20 74 |o",,bloc|k%...- t|
|00000280| 69 74 6c 65 61 64 64 72 | 3d 62 6c 6f 63 6b 25 21 |itleaddr|=block%!|
|00000290| 37 36 20 3a 20 74 69 74 | 6c 65 6c 65 6e 3d 62 6c |76 : tit|lelen=bl|
|000002a0| 6f 63 6b 25 21 38 34 0d | 01 04 04 0d 01 0e 25 20 |ock%!84.|......% |
|000002b0| 69 6e 66 6f 68 61 6e 64 | 6c 65 20 3d 20 a4 77 69 |infohand|le = .wi|
|000002c0| 6e 64 6f 77 5f 64 65 66 | 28 22 69 6e 66 6f 22 29 |ndow_def|("info")|
|000002d0| 0d 01 18 1b 20 c8 99 22 | 57 69 6d 70 5f 43 6c 6f |.... .."|Wimp_Clo|
|000002e0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 01 22 0f 20 |seTempla|te"..". |
|000002f0| f2 6d 61 69 6e 5f 6d 65 | 6e 75 0d 01 2c 04 0d 01 |.main_me|nu..,...|
|00000300| 36 0d 20 f2 69 63 6f 6e | 62 61 72 0d 01 40 3a 20 |6. .icon|bar..@: |
|00000310| ef 32 33 2c 31 39 31 2c | 30 2c 36 32 2c 39 39 2c |.23,191,|0,62,99,|
|00000320| 39 39 2c 35 34 2c 32 30 | 2c 31 31 39 2c 30 20 3a |99,54,20|,119,0 :|
|00000330| 20 f4 20 72 65 64 65 66 | 69 6e 65 20 bf 20 74 6f | . redef|ine . to|
|00000340| 20 4f 68 6d 73 0d 01 4a | 10 20 de 20 76 61 6c 75 | Ohms..J|. . valu|
|00000350| 65 28 32 35 29 0d 01 54 | 85 20 76 61 6c 75 65 28 |e(25)..T|. value(|
|00000360| 29 3d 30 2e 31 2c 30 2e | 31 31 2c 30 2e 31 32 2c |)=0.1,0.|11,0.12,|
|00000370| 30 2e 31 33 2c 30 2e 31 | 35 2c 30 2e 31 36 2c 30 |0.13,0.1|5,0.16,0|
|00000380| 2e 31 38 2c 30 2e 32 2c | 30 2e 32 32 2c 30 2e 32 |.18,0.2,|0.22,0.2|
|00000390| 34 2c 30 2e 32 37 2c 30 | 2e 33 2c 30 2e 33 33 2c |4,0.27,0|.3,0.33,|
|000003a0| 30 2e 33 36 2c 30 2e 33 | 39 2c 30 2e 34 33 2c 30 |0.36,0.3|9,0.43,0|
|000003b0| 2e 34 37 2c 30 2e 35 31 | 2c 30 2e 35 36 2c 30 2e |.47,0.51|,0.56,0.|
|000003c0| 36 32 2c 30 2e 36 38 2c | 30 2e 37 35 2c 30 2e 38 |62,0.68,|0.75,0.8|
|000003d0| 32 2c 30 2e 39 31 2c 31 | 2e 30 0d 01 5e 05 20 0d |2,0.91,1|.0..^. .|
|000003e0| 01 68 0f 20 ee 20 85 20 | f2 65 72 72 6f 72 0d 01 |.h. . . |.error..|
|000003f0| 72 0b 20 f2 63 6c 65 61 | 72 0d 01 7c 2a 20 f2 6f |r. .clea|r..|* .o|
|00000400| 70 65 6e 75 70 28 6d 61 | 69 6e 68 61 6e 64 6c 65 |penup(ma|inhandle|
|00000410| 2c 32 30 30 2c 31 30 30 | 30 2c 31 32 33 36 2c 39 |,200,100|0,1236,9|
|00000420| 33 36 29 0d 01 86 0e 20 | f2 63 61 72 65 74 28 30 |36).... |.caret(0|
|00000430| 29 0d 01 90 06 20 f5 0d | 01 9a 2b 20 20 20 c8 99 |).... ..|..+ ..|
|00000440| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 2c 30 2c 62 6c |"Wimp_Po|ll",0,bl|
|00000450| 6f 63 6b 25 20 b8 20 72 | 65 61 73 6f 6e 2c 70 74 |ock% . r|eason,pt|
|00000460| 72 25 0d 01 a4 12 20 20 | 20 c8 8e 20 72 65 61 73 |r%.... | .. reas|
|00000470| 6f 6e 20 ca 0d 01 ae 1a | 20 20 20 20 20 c9 20 31 |on .....| . 1|
|00000480| 3a f2 72 65 64 72 61 77 | 77 69 6e 64 6f 77 0d 01 |:.redraw|window..|
|00000490| b8 27 20 20 20 20 20 c9 | 20 32 3a c8 99 20 22 57 |.' .| 2:.. "W|
|000004a0| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|000004b0| 2c 70 74 72 25 0d 01 c2 | 28 20 20 20 20 20 c9 20 |,ptr%...|( . |
|000004c0| 33 3a c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |3:.. "Wi|mp_Close|
|000004d0| 57 69 6e 64 6f 77 22 2c | 2c 70 74 72 25 0d 01 cc |Window",|,ptr%...|
|000004e0| 15 20 20 20 20 20 c9 20 | 36 3a f2 63 6c 69 63 6b |. . |6:.click|
|000004f0| 65 64 0d 01 d6 16 20 20 | 20 20 20 c9 20 38 3a f2 |ed.... | . 8:.|
|00000500| 6b 65 79 70 72 65 73 73 | 0d 01 e0 1a 20 20 20 20 |keypress|.... |
|00000510| 20 c9 20 39 3a f2 70 72 | 6f 63 65 73 73 5f 6d 65 | . 9:.pr|ocess_me|
|00000520| 6e 75 0d 01 ea 1b 20 20 | 20 20 20 c9 20 31 37 2c |nu.... | . 17,|
|00000530| 31 38 3a f2 4f 53 6d 65 | 73 73 61 67 65 0d 01 f4 |18:.OSme|ssage...|
|00000540| 08 20 20 20 cb 0d 01 fe | 0b 20 fd 20 71 75 69 74 |. ....|. . quit|
|00000550| 0d 02 08 17 20 c8 99 22 | 57 69 6d 70 5f 43 6c 6f |.... .."|Wimp_Clo|
|00000560| 73 65 44 6f 77 6e 22 0d | 02 12 05 e0 0d 02 1c 05 |seDown".|........|
|00000570| 3a 0d 02 26 50 f4 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |:..&P. -|--------|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 0d 02 30 05 3a 0d 02 | 3a 19 20 dd a4 4c 6f 61 |-..0.:..|:. ..Loa|
|000005d0| 64 53 70 72 69 74 65 73 | 28 66 69 6c 65 24 29 0d |dSprites|(file$).|
|000005e0| 02 44 18 20 ea 20 66 69 | 6c 65 25 2c 73 69 7a 65 |.D. . fi|le%,size|
|000005f0| 25 2c 61 72 65 61 25 0d | 02 4e 12 20 66 69 6c 65 |%,area%.|.N. file|
|00000600| 25 3d 8e 20 66 69 6c 65 | 24 0d 02 58 17 20 73 69 |%=. file|$..X. si|
|00000610| 7a 65 25 3d 28 a2 23 66 | 69 6c 65 25 29 2b 31 36 |ze%=(.#f|ile%)+16|
|00000620| 0d 02 62 0c 20 d9 23 66 | 69 6c 65 25 0d 02 6c 12 |..b. .#f|ile%..l.|
|00000630| 20 de 20 61 72 65 61 25 | 20 73 69 7a 65 25 0d 02 | . area%| size%..|
|00000640| 76 11 20 21 61 72 65 61 | 25 3d 73 69 7a 65 25 0d |v. !area|%=size%.|
|00000650| 02 80 0e 20 61 72 65 61 | 25 21 38 3d 30 0d 02 8a |... area|%!8=0...|
|00000660| 20 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f | .. "OS|_SpriteO|
|00000670| 70 22 2c 26 31 30 39 2c | 61 72 65 61 25 0d 02 94 |p",&109,|area%...|
|00000680| 26 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |& .. "OS|_SpriteO|
|00000690| 70 22 2c 26 31 30 41 2c | 61 72 65 61 25 2c 66 69 |p",&10A,|area%,fi|
|000006a0| 6c 65 24 0d 02 9e 0b 20 | 3d 61 72 65 61 25 0d 02 |le$.... |=area%..|
|000006b0| a8 05 3a 0d 02 b2 11 dd | f2 63 61 6c 63 75 6c 61 |..:.....|.calcula|
|000006c0| 74 65 52 43 0d 02 bc 19 | 20 64 75 74 79 3d bb 28 |teRC....| duty=.(|
|000006d0| 24 69 63 6f 6e 61 64 64 | 72 28 31 29 29 0d 02 c6 |$iconadd|r(1))...|
|000006e0| 19 20 66 72 65 71 3d bb | 28 24 69 63 6f 6e 61 64 |. freq=.|($iconad|
|000006f0| 64 72 28 30 29 29 0d 02 | d0 11 20 e7 20 66 72 65 |dr(0))..|.. . fre|
|00000700| 71 3d 30 20 8c 20 e1 0d | 02 da 1b 20 e7 20 64 75 |q=0 . ..|... . du|
|00000710| 74 79 3c 35 30 20 84 20 | 64 75 74 79 3e 31 30 30 |ty<50 . |duty>100|
|00000720| 20 8c 0d 02 e4 1b 20 20 | 20 24 69 63 6f 6e 61 64 | ..... | $iconad|
|00000730| 64 72 28 31 29 3d 22 35 | 30 22 2b bd 30 0d 02 ee |dr(1)="5|0"+.0...|
|00000740| 16 20 20 20 24 69 63 6f | 6e 61 64 64 72 28 32 29 |. $ico|naddr(2)|
|00000750| 3d bd 30 0d 02 f8 16 20 | 20 20 24 69 63 6f 6e 61 |=.0.... | $icona|
|00000760| 64 64 72 28 33 29 3d bd | 30 0d 03 02 16 20 20 20 |ddr(3)=.|0.... |
|00000770| 24 69 63 6f 6e 61 64 64 | 72 28 34 29 3d bd 30 0d |$iconadd|r(4)=.0.|
|00000780| 03 0c 12 20 20 20 f2 75 | 70 64 61 74 65 5f 61 6c |... .u|pdate_al|
|00000790| 6c 0d 03 16 06 20 cd 0d | 03 20 67 20 e7 20 64 75 |l.... ..|. g . du|
|000007a0| 74 79 3c 35 30 20 84 20 | 64 75 74 79 3e 31 30 30 |ty<50 . |duty>100|
|000007b0| 20 8c 20 f2 74 65 78 74 | 5f 6d 65 73 73 61 67 65 | . .text|_message|
|000007c0| 28 22 44 75 74 79 20 63 | 79 63 6c 65 20 73 68 6f |("Duty c|ycle sho|
|000007d0| 75 6c 64 20 62 65 20 67 | 72 65 61 74 65 72 20 74 |uld be g|reater t|
|000007e0| 68 61 6e 20 35 30 25 20 | 61 6e 64 20 6c 65 73 73 |han 50% |and less|
|000007f0| 20 74 68 61 6e 20 31 30 | 30 25 22 29 3a e1 0d 03 | than 10|0%"):...|
|00000800| 2a 0b 20 c8 8e 20 b9 20 | ca 0d 03 34 22 20 20 20 |*. .. . |...4" |
|00000810| c9 20 66 72 65 71 3c 31 | 30 20 20 20 20 20 3a 20 |. freq<1|0 : |
|00000820| 43 31 20 3d 30 2e 30 30 | 30 30 31 0d 03 3e 1f 20 |C1 =0.00|001..>. |
|00000830| 20 20 c9 20 66 72 65 71 | 3c 31 30 30 30 20 20 20 | . freq|<1000 |
|00000840| 3a 20 43 31 20 3d 31 45 | 2d 36 0d 03 48 1f 20 20 |: C1 =1E|-6..H. |
|00000850| 20 c9 20 66 72 65 71 3c | 31 30 30 30 30 30 20 3a | . freq<|100000 :|
|00000860| 20 43 31 20 3d 31 45 2d | 38 0d 03 52 06 20 7f 0d | C1 =1E-|8..R. ..|
|00000870| 03 5c 0e 20 20 20 43 31 | 3d 31 45 2d 39 0d 03 66 |.\. C1|=1E-9..f|
|00000880| 06 20 cb 0d 03 70 17 20 | 6b 3d 31 2f 28 30 2e 36 |. ...p. |k=1/(0.6|
|00000890| 39 2a 66 72 65 71 2a 43 | 31 29 0d 03 7a 16 20 52 |9*freq*C|1)..z. R|
|000008a0| 32 3d 6b 2a 28 31 2d 64 | 75 74 79 2f 31 30 30 29 |2=k*(1-d|uty/100)|
|000008b0| 0d 03 84 0e 20 52 31 3d | 6b 2d 32 2a 52 32 0d 03 |.... R1=|k-2*R2..|
|000008c0| 8e 16 20 52 31 3d a4 70 | 72 65 66 66 65 72 65 64 |.. R1=.p|reffered|
|000008d0| 28 52 31 29 0d 03 98 16 | 20 52 32 3d a4 70 72 65 |(R1)....| R2=.pre|
|000008e0| 66 66 65 72 65 64 28 52 | 32 29 0d 03 a2 0d 20 f2 |ffered(R|2).... .|
|000008f0| 72 65 73 75 6c 74 73 0d | 03 ac 05 e1 0d 03 b6 05 |results.|........|
|00000900| 3a 0d 03 c0 13 dd f2 63 | 61 6c 63 75 6c 61 74 65 |:......c|alculate|
|00000910| 46 72 65 71 0d 03 ca 1c | 20 52 31 3d a4 69 6e 70 |Freq....| R1=.inp|
|00000920| 75 74 28 24 69 63 6f 6e | 61 64 64 72 28 32 29 29 |ut($icon|addr(2))|
|00000930| 0d 03 d4 1c 20 52 32 3d | a4 69 6e 70 75 74 28 24 |.... R2=|.input($|
|00000940| 69 63 6f 6e 61 64 64 72 | 28 33 29 29 0d 03 de 20 |iconaddr|(3))... |
|00000950| 20 43 31 3d a4 69 6e 70 | 75 74 28 24 69 63 6f 6e | C1=.inp|ut($icon|
|00000960| 61 64 64 72 28 34 29 29 | 2f 31 45 36 0d 03 e8 1f |addr(4))|/1E6....|
|00000970| 20 e7 20 28 52 31 3d 30 | 20 80 20 52 32 3d 30 29 | . (R1=0| . R2=0)|
|00000980| 20 84 20 43 31 3d 30 20 | 8c 20 e1 0d 03 f2 0f 20 | . C1=0 |. ..... |
|00000990| e7 20 43 31 3d 30 20 8c | 20 e1 0d 03 fc 1f 20 66 |. C1=0 .| ..... f|
|000009a0| 72 65 71 3d 31 2f 28 30 | 2e 36 39 2a 28 52 31 2b |req=1/(0|.69*(R1+|
|000009b0| 32 2a 52 32 29 2a 43 31 | 29 0d 04 06 20 20 64 75 |2*R2)*C1|)... du|
|000009c0| 74 79 3d 31 30 30 2d 31 | 30 30 2a 28 52 32 2f 28 |ty=100-1|00*(R2/(|
|000009d0| 52 31 2b 32 2a 52 32 29 | 29 0d 04 10 0d 20 f2 72 |R1+2*R2)|).... .r|
|000009e0| 65 73 75 6c 74 73 0d 04 | 1a 05 e1 0d 04 24 05 3a |esults..|.....$.:|
|000009f0| 0d 04 2e 15 dd f2 63 61 | 6c 63 75 6c 61 74 65 4d |......ca|lculateM|
|00000a00| 6f 6e 6f 43 52 0d 04 38 | 14 20 54 24 3d 24 69 63 |onoCR..8|. T$=$ic|
|00000a10| 6f 6e 61 64 64 72 28 30 | 29 0d 04 42 19 20 74 69 |onaddr(0|)..B. ti|
|00000a20| 6d 65 3d bb 28 24 69 63 | 6f 6e 61 64 64 72 28 30 |me=.($ic|onaddr(0|
|00000a30| 29 29 0d 04 4c 11 20 e7 | 20 74 69 6d 65 3d 30 20 |))..L. .| time=0 |
|00000a40| 8c 20 e1 0d 04 56 2d 20 | e7 20 a7 54 24 2c 22 75 |. ...V- |. .T$,"u|
|00000a50| 22 29 20 84 20 a7 54 24 | 2c 22 b5 22 29 8c 20 74 |") . .T$|,"."). t|
|00000a60| 69 6d 65 3d 74 69 6d 65 | 2f 31 30 30 30 30 30 30 |ime=time|/1000000|
|00000a70| 0d 04 60 2a 20 e7 20 a7 | 54 24 2c 22 6d 22 29 20 |..`* . .|T$,"m") |
|00000a80| 84 20 a7 54 24 2c 22 4d | 22 29 8c 20 74 69 6d 65 |. .T$,"M|"). time|
|00000a90| 3d 74 69 6d 65 2f 31 30 | 30 30 0d 04 6a 4f 20 e7 |=time/10|00..jO .|
|00000aa0| 20 74 69 6d 65 3c 31 45 | 2d 36 20 8c 20 f2 74 65 | time<1E|-6 . .te|
|00000ab0| 78 74 5f 6d 65 73 73 61 | 67 65 28 22 41 20 64 75 |xt_messa|ge("A du|
|00000ac0| 72 61 74 69 6f 6e 20 6c | 65 73 73 20 74 68 61 6e |ration l|ess than|
|00000ad0| 20 31 b5 73 20 69 73 20 | 6e 6f 74 20 72 65 63 6f | 1.s is |not reco|
|00000ae0| 6d 65 6e 64 65 64 21 22 | 29 0d 04 74 0d 20 43 31 |mended!"|)..t. C1|
|00000af0| 3d 31 45 2d 31 31 0d 04 | 7e 06 20 f5 0d 04 88 18 |=1E-11..|~. .....|
|00000b00| 20 20 20 52 31 3d 74 69 | 6d 65 2f 28 30 2e 36 39 | R1=ti|me/(0.69|
|00000b10| 2a 43 31 29 0d 04 92 1a | 20 20 20 e7 20 52 31 3e |*C1)....| . R1>|
|00000b20| 31 45 36 20 8c 20 43 31 | 3d 43 31 2a 31 30 0d 04 |1E6 . C1|=C1*10..|
|00000b30| 9c 0e 20 fd 20 52 31 3c | 3d 31 45 36 0d 04 a6 10 |.. . R1<|=1E6....|
|00000b40| 20 e7 20 43 31 3c 31 45 | 2d 39 20 8c 0d 04 b0 09 | . C1<1E|-9 .....|
|00000b50| 20 20 20 20 f5 0d 04 ba | 12 20 20 20 20 20 20 43 | ....|. C|
|00000b60| 31 3d 43 31 2a 31 30 0d | 04 c4 1b 20 20 20 20 20 |1=C1*10.|... |
|00000b70| 20 52 31 3d 74 69 6d 65 | 2f 28 30 2e 36 39 2a 43 | R1=time|/(0.69*C|
|00000b80| 31 29 0d 04 ce 12 20 20 | 20 20 fd 20 43 31 3e 3d |1).... | . C1>=|
|00000b90| 31 45 2d 39 0d 04 d8 06 | 20 cd 0d 04 e2 16 20 52 |1E-9....| ..... R|
|00000ba0| 31 3d a4 70 72 65 66 66 | 65 72 65 64 28 52 31 29 |1=.preff|ered(R1)|
|00000bb0| 0d 04 ec 12 20 f2 6d 6f | 6e 6f 5f 72 65 73 75 6c |.... .mo|no_resul|
|00000bc0| 74 73 0d 04 f6 05 e1 0d | 05 00 05 3a 0d 05 0a 14 |ts......|...:....|
|00000bd0| dd f2 63 61 6c 63 75 6c | 61 74 65 54 69 6d 65 72 |..calcul|ateTimer|
|00000be0| 0d 05 14 1c 20 52 31 3d | a4 69 6e 70 75 74 28 24 |.... R1=|.input($|
|00000bf0| 69 63 6f 6e 61 64 64 72 | 28 32 29 29 0d 05 1e 20 |iconaddr|(2))... |
|00000c00| 20 43 31 3d a4 69 6e 70 | 75 74 28 24 69 63 6f 6e | C1=.inp|ut($icon|
|00000c10| 61 64 64 72 28 34 29 29 | 2f 31 45 36 0d 05 28 11 |addr(4))|/1E6..(.|
|00000c20| 20 74 3d 30 2e 36 39 2a | 52 31 2a 43 31 0d 05 32 | t=0.69*|R1*C1..2|
|00000c30| 20 20 24 69 63 6f 6e 61 | 64 64 72 28 30 29 3d a4 | $icona|ddr(0)=.|
|00000c40| 66 6f 72 6d 61 74 28 74 | 2c 22 54 22 29 0d 05 3c |format(t|,"T")..<|
|00000c50| 10 20 f2 75 70 64 61 74 | 65 5f 61 6c 6c 0d 05 46 |. .updat|e_all..F|
|00000c60| 11 20 f2 63 61 72 65 74 | 28 69 63 6f 6e 29 0d 05 |. .caret|(icon)..|
|00000c70| 50 05 e1 0d 05 5a 05 3a | 0d 05 64 0d dd f2 72 65 |P....Z.:|..d...re|
|00000c80| 73 75 6c 74 73 0d 05 6e | 1c 20 24 69 63 6f 6e 61 |sults..n|. $icona|
|00000c90| 64 64 72 28 30 29 3d c3 | 28 66 72 65 71 29 2b bd |ddr(0)=.|(freq)+.|
|00000ca0| 30 0d 05 78 1c 20 24 69 | 63 6f 6e 61 64 64 72 28 |0..x. $i|conaddr(|
|00000cb0| 31 29 3d c3 28 64 75 74 | 79 29 2b bd 30 0d 05 82 |1)=.(dut|y)+.0...|
|00000cc0| 21 20 24 69 63 6f 6e 61 | 64 64 72 28 32 29 3d a4 |! $icona|ddr(2)=.|
|00000cd0| 66 6f 72 6d 61 74 28 52 | 31 2c 22 52 22 29 0d 05 |format(R|1,"R")..|
|00000ce0| 8c 21 20 24 69 63 6f 6e | 61 64 64 72 28 33 29 3d |.! $icon|addr(3)=|
|00000cf0| a4 66 6f 72 6d 61 74 28 | 52 32 2c 22 52 22 29 0d |.format(|R2,"R").|
|00000d00| 05 96 25 20 24 69 63 6f | 6e 61 64 64 72 28 34 29 |..% $ico|naddr(4)|
|00000d10| 3d a4 66 6f 72 6d 61 74 | 28 43 31 2a 31 45 36 2c |=.format|(C1*1E6,|
|00000d20| 22 43 22 29 0d 05 a0 10 | 20 f2 75 70 64 61 74 65 |"C")....| .update|
|00000d30| 5f 61 6c 6c 0d 05 aa 11 | 20 f2 63 61 72 65 74 28 |_all....| .caret(|
|00000d40| 69 63 6f 6e 29 0d 05 b4 | 05 e1 0d 05 be 05 3a 0d |icon)...|......:.|
|00000d50| 05 c8 12 dd f2 6d 6f 6e | 6f 5f 72 65 73 75 6c 74 |.....mon|o_result|
|00000d60| 73 0d 05 d2 11 20 74 3d | 30 2e 36 39 2a 52 31 2a |s.... t=|0.69*R1*|
|00000d70| 43 31 0d 05 dc 20 20 24 | 69 63 6f 6e 61 64 64 72 |C1... $|iconaddr|
|00000d80| 28 30 29 3d a4 66 6f 72 | 6d 61 74 28 74 2c 22 54 |(0)=.for|mat(t,"T|
|00000d90| 22 29 0d 05 e6 21 20 24 | 69 63 6f 6e 61 64 64 72 |")...! $|iconaddr|
|00000da0| 28 32 29 3d a4 66 6f 72 | 6d 61 74 28 52 31 2c 22 |(2)=.for|mat(R1,"|
|00000db0| 52 22 29 0d 05 f0 25 20 | 24 69 63 6f 6e 61 64 64 |R")...% |$iconadd|
|00000dc0| 72 28 34 29 3d a4 66 6f | 72 6d 61 74 28 43 31 2a |r(4)=.fo|rmat(C1*|
|00000dd0| 31 45 36 2c 22 43 22 29 | 0d 05 fa 10 20 f2 75 70 |1E6,"C")|.... .up|
|00000de0| 64 61 74 65 5f 61 6c 6c | 0d 06 04 11 20 f2 63 61 |date_all|.... .ca|
|00000df0| 72 65 74 28 69 63 6f 6e | 29 0d 06 0e 05 e1 0d 06 |ret(icon|).......|
|00000e00| 18 05 3a 0d 06 22 0f dd | a4 69 6e 70 75 74 28 52 |..:.."..|.input(R|
|00000e10| 24 29 0d 06 2c 0c 20 69 | 3d bb 28 52 24 29 0d 06 |$)..,. i|=.(R$)..|
|00000e20| 36 25 20 e7 20 a7 52 24 | 2c 22 4b 22 29 20 84 20 |6% . .R$|,"K") . |
|00000e30| a7 52 24 2c 22 6b 22 29 | 20 8c 20 69 3d 69 2a 31 |.R$,"k")| . i=i*1|
|00000e40| 30 30 30 0d 06 40 1d 20 | e7 20 a7 52 24 2c 22 4d |000..@. |. .R$,"M|
|00000e50| 22 29 20 8c 20 69 3d 69 | 2a 31 30 30 30 30 30 30 |") . i=i|*1000000|
|00000e60| 0d 06 4a 25 20 e7 20 a7 | 52 24 2c 22 4e 22 29 20 |..J% . .|R$,"N") |
|00000e70| 84 20 a7 52 24 2c 22 6e | 22 29 20 8c 20 69 3d 69 |. .R$,"n|") . i=i|
|00000e80| 2f 31 30 30 30 0d 06 54 | 28 20 e7 20 a7 52 24 2c |/1000..T|( . .R$,|
|00000e90| 22 50 22 29 20 84 20 a7 | 52 24 2c 22 70 22 29 20 |"P") . .|R$,"p") |
|00000ea0| 8c 20 69 3d 69 2f 31 30 | 30 30 30 30 30 0d 06 5e |. i=i/10|00000..^|
|00000eb0| 06 3d 69 0d 06 68 05 3a | 0d 06 72 12 dd a4 70 72 |.=i..h.:|..r...pr|
|00000ec0| 65 66 66 65 72 65 64 28 | 72 29 0d 06 7c 11 20 6d |effered(|r)..|. m|
|00000ed0| 75 6c 74 69 70 6c 69 65 | 72 3d 30 0d 06 86 0b 20 |ultiplie|r=0.... |
|00000ee0| c8 95 20 72 3e 31 0d 06 | 90 0d 20 20 20 72 3d 72 |.. r>1..|.. r=r|
|00000ef0| 2f 31 30 0d 06 9a 14 20 | 20 20 6d 75 6c 74 69 70 |/10.... | multip|
|00000f00| 6c 69 65 72 2b 3d 31 0d | 06 a4 06 20 ce 0d 06 ae |lier+=1.|... ....|
|00000f10| 22 20 74 6f 74 61 6c 3d | 32 35 20 3a f4 20 76 61 |" total=|25 :. va|
|00000f20| 6c 75 65 73 20 70 65 72 | 20 64 65 63 61 64 65 0d |lues per| decade.|
|00000f30| 06 b8 0d 20 64 69 66 66 | 3d 31 45 39 0d 06 c2 13 |... diff|=1E9....|
|00000f40| 20 e3 20 49 25 3d 31 20 | b8 20 74 6f 74 61 6c 0d | . I%=1 |. total.|
|00000f50| 06 cc 38 20 20 20 e7 20 | 64 69 66 66 3e 94 28 72 |..8 . |diff>.(r|
|00000f60| 2d 76 61 6c 75 65 28 49 | 25 29 29 20 8c 20 64 69 |-value(I|%)) . di|
|00000f70| 66 66 3d 94 28 72 2d 76 | 61 6c 75 65 28 49 25 29 |ff=.(r-v|alue(I%)|
|00000f80| 29 3a 58 25 3d 49 25 0d | 06 d6 06 20 ed 0d 06 e0 |):X%=I%.|... ....|
|00000f90| 1c 3d 76 61 6c 75 65 28 | 58 25 29 2a 31 30 5e 6d |.=value(|X%)*10^m|
|00000fa0| 75 6c 74 69 70 6c 69 65 | 72 0d 06 ea 05 3a 0d 06 |ultiplie|r....:..|
|00000fb0| f4 15 dd a4 66 6f 72 6d | 61 74 28 69 2c 63 74 72 |....form|at(i,ctr|
|00000fc0| 6c 24 29 0d 06 fe 0f 20 | 73 75 66 66 69 78 24 3d |l$).... |suffix$=|
|00000fd0| 22 22 0d 07 08 0f 20 c8 | 8e 20 63 74 72 6c 24 20 |"".... .|. ctrl$ |
|00000fe0| ca 0d 07 12 0b 20 20 c9 | 20 22 43 22 0d 07 1c 0e |..... .| "C"....|
|00000ff0| 20 20 20 20 c8 8e 20 b9 | 20 ca 0d 07 26 2d 20 20 | .. .| ...&- |
|00001000| 20 20 20 c9 20 69 3c 31 | 45 2d 34 3a 20 69 3d 69 | . i<1|E-4: i=i|
|00001010| 2a 31 30 30 30 30 30 30 | 20 3a 20 73 75 66 66 69 |*1000000| : suffi|
|00001020| 78 24 3d 22 70 66 22 0d | 07 30 2c 20 20 20 20 20 |x$="pf".|.0, |
|00001030| c9 20 69 3c 30 2e 31 20 | 20 20 3a 20 69 3d 69 2a |. i<0.1 | : i=i*|
|00001040| 31 30 30 30 20 3a 20 73 | 75 66 66 69 78 24 3d 22 |1000 : s|uffix$="|
|00001050| 6e 66 22 0d 07 3a 21 20 | 20 20 20 20 c9 20 69 3e |nf"..:! | . i>|
|00001060| 3d 30 2e 31 20 20 3a 20 | 73 75 66 66 69 78 24 3d |=0.1 : |suffix$=|
|00001070| 22 b5 66 22 0d 07 44 09 | 20 20 20 20 cb 0d 07 4e |".f"..D.| ...N|
|00001080| 0b 20 20 c9 20 22 52 22 | 0d 07 58 0e 20 20 20 20 |. . "R"|..X. |
|00001090| c8 8e 20 b9 20 ca 0d 07 | 62 30 20 20 20 20 20 c9 |.. . ...|b0 .|
|000010a0| 20 69 3e 31 30 30 30 30 | 30 30 3a 20 69 3d 69 2f | i>10000|00: i=i/|
|000010b0| 31 30 30 30 30 30 30 20 | 3a 20 73 75 66 66 69 78 |1000000 |: suffix|
|000010c0| 24 3d 22 4d bf 22 0d 07 | 6c 2d 20 20 20 20 20 c9 |$="M."..|l- .|
|000010d0| 20 69 3e 31 30 30 30 20 | 20 20 3a 20 69 3d 69 2f | i>1000 | : i=i/|
|000010e0| 31 30 30 30 20 3a 20 73 | 75 66 66 69 78 24 3d 22 |1000 : s|uffix$="|
|000010f0| 4b bf 22 0d 07 76 21 20 | 20 20 20 20 c9 20 69 3c |K."..v! | . i<|
|00001100| 3d 31 30 30 30 20 20 3a | 20 73 75 66 66 69 78 24 |=1000 :| suffix$|
|00001110| 3d 22 bf 22 0d 07 80 09 | 20 20 20 20 cb 0d 07 8a |="."....| ....|
|00001120| 0b 20 20 c9 20 22 54 22 | 0d 07 94 0e 20 20 20 20 |. . "T"|.... |
|00001130| c8 8e 20 b9 20 ca 0d 07 | 9e 2e 20 20 20 20 20 c9 |.. . ...|.. .|
|00001140| 20 69 3c 31 45 2d 34 20 | 3a 20 69 3d 69 2a 31 30 | i<1E-4 |: i=i*10|
|00001150| 30 30 30 30 30 20 3a 20 | 73 75 66 66 69 78 24 3d |00000 : |suffix$=|
|00001160| 22 b5 73 22 0d 07 a8 2b | 20 20 20 20 20 c9 20 69 |".s"...+| . i|
|00001170| 3c 30 2e 31 20 20 3a 20 | 69 3d 69 2a 31 30 30 30 |<0.1 : |i=i*1000|
|00001180| 20 3a 20 73 75 66 66 69 | 78 24 3d 22 6d 73 22 0d | : suffi|x$="ms".|
|00001190| 07 b2 1f 20 20 20 20 20 | c9 20 69 3e 3d 30 2e 31 |... |. i>=0.1|
|000011a0| 20 3a 20 73 75 66 66 69 | 78 24 3d 22 73 22 0d 07 | : suffi|x$="s"..|
|000011b0| bc 09 20 20 20 20 cb 0d | 07 c6 06 20 cb 0d 07 d0 |.. ..|... ....|
|000011c0| 14 3d c3 28 69 29 2b 73 | 75 66 66 69 78 24 2b bd |.=.(i)+s|uffix$+.|
|000011d0| 30 0d 07 da 05 3a 0d 07 | e4 17 dd a4 77 69 6e 64 |0....:..|....wind|
|000011e0| 6f 77 5f 64 65 66 28 6e | 61 6d 65 24 29 0d 07 ee |ow_def(n|ame$)...|
|000011f0| 56 20 c8 99 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |V .."Wim|p_LoadTe|
|00001200| 6d 70 6c 61 74 65 22 2c | 2c 74 65 6d 70 62 75 66 |mplate",|,tempbuf|
|00001210| 2c 6e 65 78 74 2c 69 63 | 6f 6e 62 75 66 2b 69 63 |,next,ic|onbuf+ic|
|00001220| 6f 6e 62 75 66 6c 65 6e | 2c 66 6f 6e 74 61 72 72 |onbuflen|,fontarr|
|00001230| 61 79 2c 6e 61 6d 65 24 | 2c 30 20 b8 20 2c 2c 6e |ay,name$|,0 . ,,n|
|00001240| 65 78 74 0d 07 f8 1a 20 | 74 65 6d 70 62 75 66 21 |ext.... |tempbuf!|
|00001250| 36 34 3d 73 70 72 69 74 | 65 61 72 65 61 0d 08 02 |64=sprit|earea...|
|00001260| 2c 20 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |, .."Wim|p_Create|
|00001270| 57 69 6e 64 6f 77 22 2c | 2c 74 65 6d 70 62 75 66 |Window",|,tempbuf|
|00001280| 20 b8 20 68 61 6e 64 6c | 65 0d 08 0c 0b 3d 68 61 | . handl|e....=ha|
|00001290| 6e 64 6c 65 0d 08 16 05 | 3a 0d 08 20 1b dd a4 69 |ndle....|:.. ...i|
|000012a0| 63 6f 6e 61 64 64 72 28 | 77 69 6e 64 6f 77 2c 69 |conaddr(|window,i|
|000012b0| 63 6f 6e 29 0d 08 2a 24 | 20 62 6c 6f 63 6b 25 21 |con)..*$| block%!|
|000012c0| 30 3d 77 69 6e 64 6f 77 | 20 3a 20 62 6c 6f 63 6b |0=window| : block|
|000012d0| 25 21 34 3d 69 63 6f 6e | 0d 08 34 22 20 c8 99 22 |%!4=icon|..4" .."|
|000012e0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|000012f0| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 08 3e 0f 3d 20 |e",,bloc|k%..>.= |
|00001300| 62 6c 6f 63 6b 25 21 32 | 38 0d 08 48 05 3a 0d 08 |block%!2|8..H.:..|
|00001310| 52 1c dd f2 6f 70 65 6e | 75 70 28 77 69 6e 64 6f |R...open|up(windo|
|00001320| 77 2c 78 2c 79 2c 77 2c | 68 29 0d 08 5c 14 20 62 |w,x,y,w,|h)..\. b|
|00001330| 6c 6f 63 6b 25 21 30 3d | 77 69 6e 64 6f 77 0d 08 |lock%!0=|window..|
|00001340| 66 20 20 62 6c 6f 63 6b | 25 21 34 3d 78 20 20 20 |f block|%!4=x |
|00001350| 3a 20 62 6c 6f 63 6b 25 | 21 38 3d 79 2d 68 0d 08 |: block%|!8=y-h..|
|00001360| 70 1f 20 62 6c 6f 63 6b | 25 21 31 32 3d 78 2b 77 |p. block|%!12=x+w|
|00001370| 3a 20 62 6c 6f 63 6b 25 | 21 31 36 3d 79 0d 08 7a |: block%|!16=y..z|
|00001380| 1f 20 62 6c 6f 63 6b 25 | 21 32 30 3d 30 20 20 3a |. block%|!20=0 :|
|00001390| 20 62 6c 6f 63 6b 25 21 | 32 34 3d 30 0d 08 84 11 | block%!|24=0....|
|000013a0| 20 62 6c 6f 63 6b 25 21 | 32 38 3d 2d 31 0d 08 8e | block%!|28=-1...|
|000013b0| 21 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |! .. "Wi|mp_OpenW|
|000013c0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 08 |indow",,|block%..|
|000013d0| 98 05 e1 0d 08 a2 05 3a | 0d 08 ac 0f dd f2 6d 61 |.......:|......ma|
|000013e0| 69 6e 5f 6d 65 6e 75 0d | 08 b6 13 20 66 6c 61 67 |in_menu.|... flag|
|000013f0| 73 3d 26 37 30 30 30 30 | 32 31 0d 08 c0 12 20 50 |s=&70000|21.... P|
|00001400| 25 3d 6d 61 69 6e 5f 6d | 65 6e 75 25 0d 08 ca 21 |%=main_m|enu%...!|
|00001410| 20 f2 6d 65 6e 75 5f 68 | 65 61 64 65 72 28 22 35 | .menu_h|eader("5|
|00001420| 35 35 20 74 69 6d 65 72 | 22 2c 31 32 29 0d 08 d4 |55 timer|",12)...|
|00001430| 2c 20 f2 6d 65 6e 75 5f | 69 74 65 6d 28 26 30 30 |, .menu_|item(&00|
|00001440| 2c 69 6e 66 6f 68 61 6e | 64 6c 65 2c 66 6c 61 67 |,infohan|dle,flag|
|00001450| 73 2c 22 49 6e 66 6f 22 | 29 0d 08 de 24 20 f2 6d |s,"Info"|)...$ .m|
|00001460| 65 6e 75 5f 69 74 65 6d | 28 26 38 30 2c 2d 31 2c |enu_item|(&80,-1,|
|00001470| 66 6c 61 67 73 2c 22 51 | 75 69 74 22 29 0d 08 e8 |flags,"Q|uit")...|
|00001480| 05 e1 0d 08 f2 05 3a 0d | 08 fc 17 dd f2 6d 65 6e |......:.|.....men|
|00001490| 75 5f 68 65 61 64 65 72 | 28 54 24 2c 77 29 0d 09 |u_header|(T$,w)..|
|000014a0| 06 3c 20 24 50 25 3d 54 | 24 20 3a 20 50 25 21 31 |.< $P%=T|$ : P%!1|
|000014b0| 32 3d 26 37 30 32 30 37 | 20 3a 20 50 25 21 31 36 |2=&70207| : P%!16|
|000014c0| 3d 77 2a 31 36 20 3a 20 | 50 25 21 32 30 3d 33 34 |=w*16 : |P%!20=34|
|000014d0| 20 3a 20 50 25 21 32 34 | 3d 38 0d 09 10 0d 20 50 | : P%!24|=8.... P|
|000014e0| 25 3d 50 25 2b 32 38 0d | 09 1a 05 e1 0d 09 24 05 |%=P%+28.|......$.|
|000014f0| 3a 0d 09 2e 24 dd f2 6d | 65 6e 75 5f 69 74 65 6d |:...$..m|enu_item|
|00001500| 28 6d 65 6e 66 6c 67 2c | 73 75 62 2c 69 63 66 6c |(menflg,|sub,icfl|
|00001510| 67 2c 54 24 29 0d 09 38 | 36 20 50 25 21 30 3d 6d |g,T$)..8|6 P%!0=m|
|00001520| 65 6e 66 6c 67 20 3a 20 | 50 25 21 34 3d 73 75 62 |enflg : |P%!4=sub|
|00001530| 20 3a 20 50 25 21 38 3d | 69 63 66 6c 67 20 3a 20 | : P%!8=|icflg : |
|00001540| 24 28 50 25 2b 31 32 29 | 3d 54 24 0d 09 42 0d 20 |$(P%+12)|=T$..B. |
|00001550| 50 25 3d 50 25 2b 32 34 | 0d 09 4c 05 e1 0d 09 56 |P%=P%+24|..L....V|
|00001560| 05 3a 0d 09 60 12 dd f2 | 70 72 6f 63 65 73 73 5f |.:..`...|process_|
|00001570| 6d 65 6e 75 0d 09 6a 12 | 20 20 20 c8 8e 20 70 74 |menu..j.| .. pt|
|00001580| 72 25 21 30 20 ca 0d 09 | 74 0d 20 20 20 20 20 c9 |r%!0 ...|t. .|
|00001590| 20 30 3a 0d 09 7e 13 20 | 20 20 20 20 c9 20 31 3a | 0:..~. | . 1:|
|000015a0| 71 75 69 74 3d b9 0d 09 | 88 08 20 20 20 cb 0d 09 |quit=...|.. ...|
|000015b0| 92 05 e1 0d 09 9c 05 3a | 0d 09 a6 0d dd f2 63 6c |.......:|......cl|
|000015c0| 69 63 6b 65 64 0d 09 b0 | 51 20 20 58 25 3d 70 74 |icked...|Q X%=pt|
|000015d0| 72 25 21 30 2d 36 34 20 | 3a 20 59 25 3d 70 74 72 |r%!0-64 |: Y%=ptr|
|000015e0| 25 21 34 2b 36 34 20 3a | 20 62 75 74 74 6f 6e 3d |%!4+64 :| button=|
|000015f0| 70 74 72 25 21 38 20 3a | 20 77 69 6e 64 6f 77 3d |ptr%!8 :| window=|
|00001600| 70 74 72 25 21 31 32 20 | 3a 20 69 63 6f 6e 3d 70 |ptr%!12 |: icon=p|
|00001610| 74 72 25 21 31 36 0d 09 | ba 2d 20 e7 20 28 62 75 |tr%!16..|.- . (bu|
|00001620| 74 74 6f 6e 20 80 20 34 | 29 20 80 20 77 69 6e 64 |tton . 4|) . wind|
|00001630| 6f 77 3d 2d 32 20 8c 20 | f2 75 70 64 61 74 65 5f |ow=-2 . |.update_|
|00001640| 61 6c 6c 0d 09 c4 10 20 | c8 8e 20 77 69 6e 64 6f |all.... |.. windo|
|00001650| 77 20 ca 0d 09 ce 13 20 | 20 20 c9 20 6d 61 69 6e |w ..... | . main|
|00001660| 68 61 6e 64 6c 65 0d 09 | d8 12 20 20 20 20 20 c8 |handle..|.. .|
|00001670| 8e 20 69 63 6f 6e 20 ca | 0d 09 e2 11 20 20 20 20 |. icon .|.... |
|00001680| 20 20 20 c9 20 30 2c 31 | 3a 0d 09 ec 1b 20 20 20 | . 0,1|:.... |
|00001690| 20 20 20 20 c9 20 31 32 | 2c 31 33 3a 20 f2 73 77 | . 12|,13: .sw|
|000016a0| 69 74 63 68 0d 09 f6 0a | 20 20 20 20 20 7f 0d 0a |itch....| ...|
|000016b0| 00 31 20 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |.1 | .. "Wim|
|000016c0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 6d |p_Create|Menu",,m|
|000016d0| 61 69 6e 5f 6d 65 6e 75 | 25 2c 58 25 2c 59 25 0d |ain_menu|%,X%,Y%.|
|000016e0| 0a 0a 0a 20 20 20 20 20 | cb 0d 0a 14 17 20 20 20 |... |..... |
|000016f0| c9 20 2d 32 20 3a 20 f4 | 20 69 63 6f 6e 62 61 72 |. -2 : .| iconbar|
|00001700| 0d 0a 1e 3f 20 20 20 20 | 20 e7 20 62 75 74 74 6f |...? | . butto|
|00001710| 6e 20 80 20 32 20 8c 20 | c8 99 20 22 57 69 6d 70 |n . 2 . |.. "Wimp|
|00001720| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 61 |_CreateM|enu",,ma|
|00001730| 69 6e 5f 6d 65 6e 75 25 | 2c 58 25 2c 31 38 30 0d |in_menu%|,X%,180.|
|00001740| 0a 28 06 20 cb 0d 0a 32 | 05 e1 0d 0a 3c 05 3a 0d |.(. ...2|....<.:.|
|00001750| 0a 46 12 dd f2 72 65 64 | 72 61 77 77 69 6e 64 6f |.F...red|rawwindo|
|00001760| 77 0d 0a 50 12 20 68 61 | 6e 64 6c 65 3d 70 74 72 |w..P. ha|ndle=ptr|
|00001770| 25 21 30 0d 0a 5a 28 20 | c8 99 20 22 57 69 6d 70 |%!0..Z( |.. "Wimp|
|00001780| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 2c |_RedrawW|indow",,|
|00001790| 70 74 72 25 20 b8 20 66 | 6c 61 67 0d 0a 64 0f 20 |ptr% . f|lag..d. |
|000017a0| c8 95 20 66 6c 61 67 3c | 3e 30 0d 0a 6e 2c 20 20 |.. flag<|>0..n, |
|000017b0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 52 | .. "W|imp_GetR|
|000017c0| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 70 74 72 25 20 |ectangle|",,ptr% |
|000017d0| b8 20 66 6c 61 67 0d 0a | 78 06 20 ce 0d 0a 82 05 |. flag..|x. .....|
|000017e0| e1 0d 0a 8c 05 3a 0d 0a | 96 0f dd f2 4f 53 6d 65 |.....:..|....OSme|
|000017f0| 73 73 61 67 65 0d 0a a0 | 15 20 61 63 74 69 6f 6e |ssage...|. action|
|00001800| 3d 62 6c 6f 63 6b 25 21 | 31 36 0d 0a aa 10 20 c8 |=block%!|16.... .|
|00001810| 8e 20 61 63 74 69 6f 6e | 20 ca 0d 0a b4 13 20 20 |. action| ..... |
|00001820| 20 c9 20 30 20 3a 20 71 | 75 69 74 3d b9 0d 0a be | . 0 : q|uit=....|
|00001830| 08 20 20 20 cb 0d 0a c8 | 05 e1 0d 0a d2 05 3a 0d |. ....|......:.|
|00001840| 0a dc 0e dd f2 6b 65 79 | 70 72 65 73 73 0d 0a e6 |.....key|press...|
|00001850| 35 20 77 69 6e 64 6f 77 | 20 3d 20 70 74 72 25 21 |5 window| = ptr%!|
|00001860| 30 20 3a 20 69 63 6f 6e | 20 3d 20 70 74 72 25 21 |0 : icon| = ptr%!|
|00001870| 34 20 3a 20 63 68 61 72 | 20 3d 20 70 74 72 25 21 |4 : char| = ptr%!|
|00001880| 32 34 0d 0a f0 1c 20 e7 | 20 77 69 6e 64 6f 77 20 |24.... .| window |
|00001890| 3d 20 6d 61 69 6e 68 61 | 6e 64 6c 65 20 8c 0d 0a |= mainha|ndle ...|
|000018a0| fa 12 20 20 20 e7 20 63 | 68 61 72 3d 31 33 20 8c |.. . c|har=13 .|
|000018b0| 0d 0b 04 12 20 20 20 20 | 20 c8 8e 20 69 63 6f 6e |.... | .. icon|
|000018c0| 20 ca 0d 0b 0e 40 20 20 | 20 20 20 20 20 c9 20 30 | ....@ | . 0|
|000018d0| 2c 31 20 20 3a 20 e7 20 | 6d 6f 6e 6f 6d 6f 64 65 |,1 : . |monomode|
|000018e0| 20 8c 20 f2 63 61 6c 63 | 75 6c 61 74 65 4d 6f 6e | . .calc|ulateMon|
|000018f0| 6f 43 52 20 8b 20 f2 63 | 61 6c 63 75 6c 61 74 65 |oCR . .c|alculate|
|00001900| 52 43 0d 0b 18 42 20 20 | 20 20 20 20 20 c9 20 32 |RC...B | . 2|
|00001910| 2c 33 2c 34 3a 20 e7 20 | 6d 6f 6e 6f 6d 6f 64 65 |,3,4: . |monomode|
|00001920| 20 8c 20 f2 63 61 6c 63 | 75 6c 61 74 65 54 69 6d | . .calc|ulateTim|
|00001930| 65 72 20 20 8b 20 f2 63 | 61 6c 63 75 6c 61 74 65 |er . .c|alculate|
|00001940| 46 72 65 71 0d 0b 22 0a | 20 20 20 20 20 cb 0d 0b |Freq..".| ...|
|00001950| 2c 06 20 cd 0d 0b 36 30 | 20 c8 99 20 22 57 69 6d |,. ...60| .. "Wim|
|00001960| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 70 74 |p_Proces|sKey",pt|
|00001970| 72 25 21 32 34 3a 20 f4 | 20 70 61 73 73 20 6b 65 |r%!24: .| pass ke|
|00001980| 79 20 6f 6e 0d 0b 40 05 | e1 0d 0b 4a 05 3a 0d 0b |y on..@.|...J.:..|
|00001990| 54 12 dd f2 73 68 75 74 | 28 77 69 6e 64 6f 77 29 |T...shut|(window)|
|000019a0| 0d 0b 5e 14 20 62 6c 6f | 63 6b 25 21 30 3d 77 69 |..^. blo|ck%!0=wi|
|000019b0| 6e 64 6f 77 0d 0b 68 22 | 20 c8 99 20 22 57 69 6d |ndow..h"| .. "Wim|
|000019c0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|000019d0| 62 6c 6f 63 6b 25 0d 0b | 72 05 e1 0d 0b 7c 05 3a |block%..|r....|.:|
|000019e0| 0d 0b 86 0b dd f2 65 72 | 72 6f 72 0d 0b 90 07 20 |......er|ror.... |
|000019f0| ef 33 0d 0b 9a 0e 20 21 | 62 6c 6f 63 6b 25 3d 30 |.3.... !|block%=0|
|00001a00| 0d 0b a4 1e 20 24 28 62 | 6c 6f 63 6b 25 2b 34 29 |.... $(b|lock%+4)|
|00001a10| 3d f6 24 2b 22 20 20 22 | 2b c3 9e 2b bd 30 0d 0b |=.$+" "|+..+.0..|
|00001a20| ae 2e 20 c8 99 22 57 69 | 6d 70 5f 52 65 70 6f 72 |.. .."Wi|mp_Repor|
|00001a30| 74 45 72 72 6f 72 22 2c | 62 6c 6f 63 6b 25 2c 32 |tError",|block%,2|
|00001a40| 2c 22 41 6e 79 a0 52 43 | 22 2b bd 30 0d 0b b8 05 |,"Any.RC|"+.0....|
|00001a50| e1 0d 0b c2 05 3a 0d 0b | cc 16 dd f2 74 65 78 74 |.....:..|....text|
|00001a60| 5f 6d 65 73 73 61 67 65 | 28 41 24 29 0d 0b d6 0e |_message|(A$)....|
|00001a70| 20 21 62 6c 6f 63 6b 25 | 3d 30 0d 0b e0 16 20 24 | !block%|=0.... $|
|00001a80| 28 62 6c 6f 63 6b 25 2b | 34 29 3d 41 24 2b bd 30 |(block%+|4)=A$+.0|
|00001a90| 0d 0b ea 32 20 c8 99 22 | 57 69 6d 70 5f 52 65 70 |...2 .."|Wimp_Rep|
|00001aa0| 6f 72 74 45 72 72 6f 72 | 22 2c 62 6c 6f 63 6b 25 |ortError|",block%|
|00001ab0| 2c 31 36 2c 22 35 35 35 | 20 54 69 6d 65 72 22 2b |,16,"555| Timer"+|
|00001ac0| bd 30 0d 0b f4 05 e1 0d | 0b fe 05 3a 0d 0c 08 0d |.0......|...:....|
|00001ad0| dd f2 69 63 6f 6e 62 61 | 72 0d 0c 12 10 20 62 6c |..iconba|r.... bl|
|00001ae0| 6f 63 6b 25 21 30 3d 2d | 31 0d 0c 1c 0f 20 62 6c |ock%!0=-|1.... bl|
|00001af0| 6f 63 6b 25 21 34 3d 30 | 0d 0c 26 0f 20 62 6c 6f |ock%!4=0|..&. blo|
|00001b00| 63 6b 25 21 38 3d 30 0d | 0c 30 11 20 62 6c 6f 63 |ck%!8=0.|.0. bloc|
|00001b10| 6b 25 21 31 32 3d 36 38 | 0d 0c 3a 11 20 62 6c 6f |k%!12=68|..:. blo|
|00001b20| 63 6b 25 21 31 36 3d 36 | 38 0d 0c 44 14 20 62 6c |ck%!16=6|8..D. bl|
|00001b30| 6f 63 6b 25 21 32 30 3d | 26 33 30 30 32 0d 0c 4e |ock%!20=|&3002..N|
|00001b40| 18 20 24 28 62 6c 6f 63 | 6b 25 2b 32 34 29 3d 22 |. $(bloc|k%+24)="|
|00001b50| 21 35 35 35 22 0d 0c 58 | 2b 20 c8 99 20 22 57 69 |!555"..X|+ .. "Wi|
|00001b60| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00001b70| 62 6c 6f 63 6b 25 20 b8 | 20 69 63 6f 6e 62 61 72 |block% .| iconbar|
|00001b80| 0d 0c 62 05 e1 0d 0c 6c | 05 3a 0d 0c 76 0b dd f2 |..b....l|.:..v...|
|00001b90| 63 6c 65 61 72 0d 0c 80 | 0f 20 e3 20 49 25 3d 30 |clear...|. . I%=0|
|00001ba0| 20 b8 20 34 0d 0c 8a 24 | 20 20 e7 20 49 25 3c 3e | . 4...$| . I%<>|
|00001bb0| 31 20 8c 20 24 69 63 6f | 6e 61 64 64 72 28 49 25 |1 . $ico|naddr(I%|
|00001bc0| 29 3d bd 31 33 2b bd 30 | 0d 0c 94 06 20 ed 0d 0c |)=.13+.0|.... ...|
|00001bd0| 9e 05 e1 0d 0c a8 05 3a | 0d 0c b2 10 dd f2 75 70 |.......:|......up|
|00001be0| 64 61 74 65 5f 61 6c 6c | 0d 0c bc 33 20 62 6c 6f |date_all|...3 blo|
|00001bf0| 63 6b 25 21 30 3d 6d 61 | 69 6e 68 61 6e 64 6c 65 |ck%!0=ma|inhandle|
|00001c00| 20 3a 20 62 6c 6f 63 6b | 25 21 38 3d 30 20 3a 20 | : block|%!8=0 : |
|00001c10| 62 6c 6f 63 6b 25 21 31 | 32 3d 30 0d 0c c6 0f 20 |block%!1|2=0.... |
|00001c20| e3 20 49 25 3d 30 20 b8 | 20 38 0d 0c d0 12 20 20 |. I%=0 .| 8.... |
|00001c30| 20 62 6c 6f 63 6b 25 21 | 34 3d 49 25 0d 0c da 30 | block%!|4=I%...0|
|00001c40| 20 20 20 c8 99 20 26 34 | 30 30 43 44 2c 2c 62 6c | .. &4|00CD,,bl|
|00001c50| 6f 63 6b 25 20 3a 20 f4 | 20 22 57 69 6d 70 5f 53 |ock% : .| "Wimp_S|
|00001c60| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 0d 0c e4 06 |etIconSt|ate"....|
|00001c70| 20 ed 0d 0c ee 18 20 62 | 6c 6f 63 6b 25 21 30 3d | ..... b|lock%!0=|
|00001c80| 6d 61 69 6e 68 61 6e 64 | 6c 65 0d 0c f8 24 20 c8 |mainhand|le...$ .|
|00001c90| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00001ca0| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 0d |State",,|block%..|
|00001cb0| 02 11 20 62 6c 6f 63 6b | 25 21 32 38 3d 2d 31 0d |.. block|%!28=-1.|
|00001cc0| 0d 0c 20 20 c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |.. .."W|imp_Open|
|00001cd0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00001ce0| 0d 16 05 e1 0d 0d 20 05 | 3a 0d 0d 2a 15 dd f2 75 |...... .|:..*...u|
|00001cf0| 70 64 61 74 65 5f 69 63 | 6f 6e 28 49 25 29 0d 0d |pdate_ic|on(I%)..|
|00001d00| 34 26 20 62 6c 6f 63 6b | 25 21 30 3d 6d 61 69 6e |4& block|%!0=main|
|00001d10| 68 61 6e 64 6c 65 20 3a | 20 62 6c 6f 63 6b 25 21 |handle :| block%!|
|00001d20| 34 3d 49 25 0d 0d 3e 1d | 20 62 6c 6f 63 6b 25 21 |4=I%..>.| block%!|
|00001d30| 38 3d 30 20 3a 20 62 6c | 6f 63 6b 25 21 31 32 3d |8=0 : bl|ock%!12=|
|00001d40| 30 0d 0d 48 2e 20 c8 99 | 20 26 34 30 30 43 44 2c |0..H. ..| &400CD,|
|00001d50| 2c 62 6c 6f 63 6b 25 20 | 3a 20 f4 20 22 57 69 6d |,block% |: . "Wim|
|00001d60| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 0d |p_SetIco|nState".|
|00001d70| 0d 52 05 e1 0d 0d 5c 05 | 3a 0d 0d 66 15 dd f2 73 |.R....\.|:..f...s|
|00001d80| 65 74 5f 69 63 6f 6e 28 | 49 25 2c 53 25 29 0d 0d |et_icon(|I%,S%)..|
|00001d90| 70 26 20 62 6c 6f 63 6b | 25 21 30 3d 6d 61 69 6e |p& block|%!0=main|
|00001da0| 68 61 6e 64 6c 65 20 3a | 20 62 6c 6f 63 6b 25 21 |handle :| block%!|
|00001db0| 34 3d 49 25 0d 0d 7a 29 | 20 e7 20 53 25 20 8c 20 |4=I%..z)| . S% . |
|00001dc0| 62 6c 6f 63 6b 25 21 38 | 3d 26 32 30 30 30 30 30 |block%!8|=&200000|
|00001dd0| 20 8b 20 62 6c 6f 63 6b | 25 21 38 3d 30 0d 0d 84 | . block|%!8=0...|
|00001de0| 16 20 62 6c 6f 63 6b 25 | 21 31 32 3d 26 32 30 30 |. block%|!12=&200|
|00001df0| 30 30 30 0d 0d 8e 2e 20 | c8 99 20 26 34 30 30 43 |000.... |.. &400C|
|00001e00| 44 2c 2c 62 6c 6f 63 6b | 25 20 3a 20 f4 20 22 57 |D,,block|% : . "W|
|00001e10| 69 6d 70 5f 53 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_SetI|conState|
|00001e20| 22 0d 0d 98 05 e1 0d 0d | a2 05 3a 0d 0d ac 11 dd |".......|..:.....|
|00001e30| f2 67 72 65 79 28 49 25 | 2c 53 25 29 0d 0d b6 28 |.grey(I%|,S%)...(|
|00001e40| 20 20 20 62 6c 6f 63 6b | 25 21 30 3d 6d 61 69 6e | block|%!0=main|
|00001e50| 68 61 6e 64 6c 65 20 3a | 20 62 6c 6f 63 6b 25 21 |handle :| block%!|
|00001e60| 34 3d 49 25 0d 0d c0 2b | 20 20 20 e7 20 53 25 20 |4=I%...+| . S% |
|00001e70| 8c 20 62 6c 6f 63 6b 25 | 21 38 3d 26 34 30 30 30 |. block%|!8=&4000|
|00001e80| 30 30 20 8b 20 62 6c 6f | 63 6b 25 21 38 3d 30 0d |00 . blo|ck%!8=0.|
|00001e90| 0d ca 18 20 20 20 62 6c | 6f 63 6b 25 21 31 32 3d |... bl|ock%!12=|
|00001ea0| 26 34 30 30 30 30 30 0d | 0d d4 30 20 20 20 c8 99 |&400000.|..0 ..|
|00001eb0| 20 26 34 30 30 43 44 2c | 2c 62 6c 6f 63 6b 25 20 | &400CD,|,block% |
|00001ec0| 3a 20 f4 20 22 57 69 6d | 70 5f 53 65 74 49 63 6f |: . "Wim|p_SetIco|
|00001ed0| 6e 53 74 61 74 65 22 0d | 0d de 05 e1 0d 0d e8 05 |nState".|........|
|00001ee0| 3a 0d 0d f2 0f dd f2 63 | 61 72 65 74 28 49 25 29 |:......c|aret(I%)|
|00001ef0| 0d 0d fc 35 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |...5 .."|Wimp_Set|
|00001f00| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 6d |CaretPos|ition",m|
|00001f10| 61 69 6e 68 61 6e 64 6c | 65 2c 49 25 2c 30 2c 30 |ainhandl|e,I%,0,0|
|00001f20| 2c 2d 31 2c 30 0d 0e 06 | 05 e1 0d 0e 10 05 3a 0d |,-1,0...|......:.|
|00001f30| 0e 1a 0f dd f2 74 69 74 | 6c 65 28 54 24 29 0d 0e |.....tit|le(T$)..|
|00001f40| 24 2d 20 24 74 69 74 6c | 65 61 64 64 72 3d 54 24 |$- $titl|eaddr=T$|
|00001f50| 2b 22 20 69 6e 20 53 65 | 72 69 65 73 20 2f 20 50 |+" in Se|ries / P|
|00001f60| 61 72 61 6c 6c 65 6c 22 | 2b bd 30 0d 0e 2e 17 20 |arallel"|+.0.... |
|00001f70| 21 62 6c 6f 63 6b 25 3d | 6d 61 69 6e 68 61 6e 64 |!block%=|mainhand|
|00001f80| 6c 65 0d 0e 38 22 20 c8 | 99 20 22 57 69 6d 70 5f |le..8" .|. "Wimp_|
|00001f90| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00001fa0| 6f 63 6b 25 0d 0e 42 24 | 20 c8 99 22 57 69 6d 70 |ock%..B$| .."Wimp|
|00001fb0| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00001fc0| 2c 2c 62 6c 6f 63 6b 25 | 0d 0e 4c 20 20 c8 99 22 |,,block%|..L .."|
|00001fd0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001fe0| 2c 2c 62 6c 6f 63 6b 25 | 0d 0e 56 0e 20 f2 63 61 |,,block%|..V. .ca|
|00001ff0| 72 65 74 28 37 29 0d 0e | 60 05 e1 0d 0e 6a 05 3a |ret(7)..|`....j.:|
|00002000| 0d 0e 74 29 dd f2 77 72 | 69 74 65 5f 76 61 6c 69 |..t)..wr|ite_vali|
|00002010| 64 61 74 69 6f 6e 28 77 | 69 6e 64 6f 77 2c 69 63 |dation(w|indow,ic|
|00002020| 6f 6e 2c 74 65 78 74 24 | 29 0d 0e 7e 14 20 62 6c |on,text$|)..~. bl|
|00002030| 6f 63 6b 25 21 30 3d 77 | 69 6e 64 6f 77 0d 0e 88 |ock%!0=w|indow...|
|00002040| 12 20 62 6c 6f 63 6b 25 | 21 34 3d 69 63 6f 6e 0d |. block%|!4=icon.|
|00002050| 0e 92 23 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..# .. "|Wimp_Get|
|00002060| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00002070| 6b 25 0d 0e 9c 1a 20 24 | 28 62 6c 6f 63 6b 25 21 |k%.... $|(block%!|
|00002080| 33 32 29 3d 74 65 78 74 | 24 2b bd 30 0d 0e a6 1d |32)=text|$+.0....|
|00002090| 20 62 6c 6f 63 6b 25 21 | 38 3d 30 20 3a 20 62 6c | block%!|8=0 : bl|
|000020a0| 6f 63 6b 25 21 31 32 3d | 30 0d 0e b0 23 20 c8 99 |ock%!12=|0...# ..|
|000020b0| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|000020c0| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 0e ba 05 |ate",,bl|ock%....|
|000020d0| e1 0d 0e c4 05 3a 0d 0e | ce 0c dd f2 73 77 69 74 |.....:..|....swit|
|000020e0| 63 68 0d 0e d8 28 20 e7 | 20 69 63 6f 6e 3d 31 32 |ch...( .| icon=12|
|000020f0| 20 8c 20 6d 6f 6e 6f 6d | 6f 64 65 3d b9 20 8b 20 | . monom|ode=. . |
|00002100| 6d 6f 6e 6f 6d 6f 64 65 | 3d a3 0d 0e e2 11 20 e7 |monomode|=..... .|
|00002110| 20 6d 6f 6e 6f 6d 6f 64 | 65 20 8c 0d 0e ec 2e 20 | monomod|e ..... |
|00002120| 20 20 f2 77 72 69 74 65 | 5f 76 61 6c 69 64 61 74 | .write|_validat|
|00002130| 69 6f 6e 28 6d 61 69 6e | 68 61 6e 64 6c 65 2c 37 |ion(main|handle,7|
|00002140| 2c 22 53 6d 6f 6e 6f 22 | 29 0d 0e f6 1f 20 20 20 |,"Smono"|).... |
|00002150| f2 67 72 65 79 28 31 2c | 31 29 20 3a 20 f2 67 72 |.grey(1,|1) : .gr|
|00002160| 65 79 28 31 31 2c 31 29 | 0d 0f 00 1f 20 20 20 f2 |ey(11,1)|.... .|
|00002170| 67 72 65 79 28 33 2c 31 | 29 20 3a 20 f2 67 72 65 |grey(3,1|) : .gre|
|00002180| 79 28 31 30 2c 31 29 0d | 0f 0a 25 20 20 20 24 69 |y(10,1).|..% $i|
|00002190| 63 6f 6e 61 64 64 72 28 | 38 29 3d 22 50 65 72 69 |conaddr(|8)="Peri|
|000021a0| 6f 64 20 53 65 63 73 2e | 22 2b bd 30 0d 0f 14 2f |od Secs.|"+.0.../|
|000021b0| 20 20 20 24 69 63 6f 6e | 61 64 64 72 28 36 29 3d | $icon|addr(6)=|
|000021c0| 22 4e 45 35 35 35 20 20 | 4d 6f 6e 6f 73 74 61 62 |"NE555 |Monostab|
|000021d0| 6c 65 20 6d 6f 64 65 22 | 2b bd 30 0d 0f 1e 06 20 |le mode"|+.0.... |
|000021e0| cc 0d 0f 28 31 20 20 20 | f2 77 72 69 74 65 5f 76 |...(1 |.write_v|
|000021f0| 61 6c 69 64 61 74 69 6f | 6e 28 6d 61 69 6e 68 61 |alidatio|n(mainha|
|00002200| 6e 64 6c 65 2c 37 2c 22 | 53 63 69 72 63 75 69 74 |ndle,7,"|Scircuit|
|00002210| 22 29 0d 0f 32 1f 20 20 | 20 f2 67 72 65 79 28 31 |")..2. | .grey(1|
|00002220| 2c 30 29 20 3a 20 f2 67 | 72 65 79 28 31 31 2c 30 |,0) : .g|rey(11,0|
|00002230| 29 0d 0f 3c 1f 20 20 20 | f2 67 72 65 79 28 33 2c |)..<. |.grey(3,|
|00002240| 30 29 20 3a 20 f2 67 72 | 65 79 28 31 30 2c 30 29 |0) : .gr|ey(10,0)|
|00002250| 0d 0f 46 22 20 20 20 24 | 69 63 6f 6e 61 64 64 72 |..F" $|iconaddr|
|00002260| 28 38 29 3d 22 46 72 65 | 71 75 65 6e 63 79 22 2b |(8)="Fre|quency"+|
|00002270| bd 30 0d 0f 50 2c 20 20 | 20 24 69 63 6f 6e 61 64 |.0..P, | $iconad|
|00002280| 64 72 28 36 29 3d 22 4e | 45 35 35 35 20 20 41 73 |dr(6)="N|E555 As|
|00002290| 74 61 62 6c 65 20 6d 6f | 64 65 22 2b bd 30 0d 0f |table mo|de"+.0..|
|000022a0| 5a 06 20 cd 0d 0f 64 0b | 20 f2 63 6c 65 61 72 0d |Z. ...d.| .clear.|
|000022b0| 0f 6e 10 20 f2 75 70 64 | 61 74 65 5f 61 6c 6c 0d |.n. .upd|ate_all.|
|000022c0| 0f 78 05 e1 0d ff | |.x.... | |
+--------+-------------------------+-------------------------+--------+--------+